% SIMPLE PROBLEM - RESPONSE FUNCTION
it = 0;

dat = [ 1.500   0.030   0.000  0.000  0.000  
        0.420   0.080   0.125  0.020  0.000
        2.000   0.040   0.000  0.000  0.000
        0.300   0.010   0.000  0.040  0.000 ];     
numg = 2;  numm = 2;

xcm  = [   0     5 ];
xfm  = [     20    ]*5;
ycm  = [   0     5 ];
yfm  = [     20    ]*5;

mt   = [  1  ];
   
BCL = 0;
BCR = 0;
BCB = 2;
BCT = 0;      

src(:,:,1) = [ 0 
               0 ];            
src(:,:,2) = [ 0
               0 ];           

IBSL = [ 0 
         0 ]';
IBSR = [ 0
         0 ]';
IBSB = [ 1 
         0 ]';
IBST = [ 0 
         0 ]';